home *** CD-ROM | disk | FTP | other *** search
- #include "FlyPaperINIT.h"
- #include <stdio.h>
- #include <SIOUX.h>
-
- void main (void)
- {
- FlyPaperGestaltPtr data;
- short flyPaperRes;
- Handle newCode;
-
- SIOUXSettings.asktosaveonclose = false;
-
- if (Gestalt (kSignature, (long*) &data)) {
- printf ("INIT wasn't loaded, can't install");
- return;
- }
-
- flyPaperRes = OpenResFile ("\pFlyPaper");
- if (flyPaperRes < 0) {
- printf ("Couldn't open \"FlyPaper\". Must be in same directory");
- return;
- }
-
- UseResFile (flyPaperRes);
- newCode = Get1Resource (kFlyPaperResType, kFlyPaperResID);
- if (!newCode) {
- printf ("Couldn't load code.");
- return;
- }
-
- DetachResource (newCode);
-
- data -> enabled = false;
- if (data -> flyPaperCode)
- DisposeHandle (data -> flyPaperCode);
-
- data -> flyPaperCode = newCode;
- data -> enabled = true;
- }